#
# Build the Project Menu
#
Set Exit 0
DeleteMenu Project ³ Dev:Null > Dev:Null
Alias HeadersOn "¶
	AddMenu Project 'Use Headers!' HeadersOff ;¶
	Set ProjectHeaders 1"
Alias HeadersOff "¶
	AddMenu Project 'Use Headers' HeadersOn ;¶
	Set ProjectHeaders 0"
AddMenu Project 'Add Header to {Active}' 'AddChange "{Active}"'
# by default, we want to add headers
HeadersOn
AddMenu Project (- ''
AddMenu Project 'Set ProjectÉ/¹' 'Execute SetProjector'
AddMenu Project 'Mount ProjectÉ/µ' 'Execute MountProjector'
AddMenu Project 'Unmount ProjectÉ' 'Execute UnmountProjector'
AddMenu Project '(-' ''
AddMenu Project 'Check {Active} Out/J' 'CheckWindowOut "{Active}"'
AddMenu Project 'Check {Active} In/I' 'CheckWindowIn "{Active}" && Close -c "{Active}"'
AddMenu Project 'Cancel {Active}' 'CancelWindowCheckOut "{Active}" && Close -c "{Active}"'
AddMenu Project "(-" ""
AddMenu Project 'Compare {Active}' 'CompareRevisions "{Active}" ·· "{WorkSheet}"'
AddMenu Project 'Merge {Active}' 'MergeBranch "{Active}" ·· "{WorkSheet}"'
AddMenu Project (- ''
AddMenu Project 'Check OutÉ' 'CheckOut -w ³³ "{WorkSheet}"'
AddMenu Project 'Check InÉ' 'CheckIn -w ³³ "{WorkSheet}"'
AddMenu Project 'New ProjectÉ' 'NewProject -w ³³ "{WorkSheet}"'
AddMenu Project (- ''
AddMenu Project 'Check Out Newer' 'CheckOut -r -update'
AddMenu Project 'Check In All Files' 'CheckinAll'
AddMenu Project 'Open Checked-Out Files' 'OpenCheckedOut'
Export ProjectHeaders

Set Exit 1
